unit uElementalMasterScript;

interface

uses uCommonScript, SysUtils, uParamsController, uMainData, uConstants;

const
    atGiftofSeraphim              = 12;

const
    ElementalMasterReUseTime: array [12..23] of TDateTime =
    (116/86400, 0, 0, 0,
     0, 0, 0, 0, 0, 0, 0, 0);

type
    TElementalMasterScript = class(TCommonScript)
    private
        procedure AnalisData;
 {       procedure SelfControll;   }
    public
        constructor Create;
        destructor Destroy;
  {      procedure LaunchScript;  }
    end;

implementation

constructor TElementalMasterScript.Create;
var
    i: integer;
begin
    inherited;
    for i := 12 to High(FReUseTime) do
    begin
        FReUseTime[i] := ElementalMasterReUseTime[i];
    end;
end;

destructor TElementalMasterScript.Destroy;
begin
    inherited;
end;

procedure TElementalMasterScript.AnalisData;
begin
    inherited;
    AddNewAction(atPetFood, plLow);
    AddNewAction(atGiftofSeraphim , plLow);
end;

end.
